home *** CD-ROM | disk | FTP | other *** search
/ The Glitch Apple Disk Collection / 2014.glitch.apple.collection.zip / indexed / SERPENT1.DSK / ROOM 3.0.txt < prev    next >
Text File  |  2014-09-09  |  2KB  |  141 lines
  1. .S F=N
  2. .S D=1
  3. .I F<5
  4. .E I F:8
  5. .T S D=0
  6. .I F>100
  7. .E I F:20
  8. .T S F=16
  9. .S N=130+D
  10. .S P=3-P
  11. .C 1,P,0
  12. .L L,BR-SL-PA
  13. .B BRNCH
  14. .S V=P
  15. .D 
  16. ._ P
  17. .V 3
  18. .H 18
  19. .M 0
  20. .I F<3
  21. .T P " <- BEN-SA
  22. .I F:4
  23. .T P "   LHASA ->
  24. .I F:8
  25. .T P " <- LHASA
  26. .I F:7
  27. .T P " <- YER-PA
  28. .I F:16
  29. .T P "  YER-PA ->
  30. .I F:4
  31. .E I F:16
  32. .T H 18
  33. .T P " <- ZHIS-KA
  34. .I F<3
  35. .E I F:9
  36. .T H 18
  37. .T P " ZHIS-KA ->
  38. .M 1
  39. .!CLRT
  40. ._ P
  41. .F 3-P
  42. .$ P
  43. .!LOOK
  44. .!HERE
  45. !LOOK
  46. .!BIRD
  47. .P "You are at a branch in the road.
  48. .I F<3
  49. .E I F:9
  50. .T P "One road goes NE, the other SE.
  51. .T S F=2
  52. .I F:4
  53. .E I F:16
  54. .T P "One road goes west, the other SE.
  55. .T S F=4
  56. .I F:7
  57. .E I F:8
  58. .T P "One road goes NE, the other west.
  59. .T S F=8
  60. .!WAIT
  61. .!BIRD
  62. %LOSG
  63. %RESG
  64. .P "I'm a computer, not a seeing eye dog.
  65. %FW..
  66. .P "You must choose which path.
  67. %L...
  68. .I F:2
  69. .T %NE..
  70. .I F:4
  71. .T %SE..
  72. .I F:8
  73. .T %W...
  74. %R...
  75. .I F:2
  76. .T %SE..
  77. .I F:4
  78. .T %W...
  79. .I F:8
  80. .T %NE..
  81. %BK..
  82. .I F:2
  83. .T %W...
  84. .I F:4
  85. .T %NE..
  86. .I F:8
  87. .T %SE..
  88. %W...
  89. .!CLRT
  90. .P "You go west.
  91. .I D
  92. .T 3 ROOM 9.0  
  93. .E 3 ROOM 1.1  
  94. .S GE(9)=7
  95. .S GE(10)=0
  96. .S N=3
  97. .!TRAV
  98. %NE..
  99. .!CLRT
  100. .I D
  101. .E P "You head northeast.
  102. .E 3 ROOM 4.0  
  103. .E J +10
  104. .S GE(13)=2
  105. .P "Please remove THE SERPENT'S STAR disk,
  106. .P "side A, turn it over to side B, and
  107. .P "reinsert it. Press return when ready.
  108. .!MORE
  109. .I MN(25):1
  110. .T 3 ROOM 16.0 
  111. .E 3 ROOM 20.0 
  112. .S GE(10)=1
  113. .S GE(9)=4
  114. .S N=3
  115. .!TRAV
  116. %SE..
  117. .!CLRT
  118. .T P "You go southeast.
  119. .I D
  120. .T 3 ROOM 7.0  
  121. .S GE(10)=0
  122. .E 3 ROOM 8.0  
  123. .S GE(10)=1
  124. .S GE(9)=10
  125. .S N=3
  126. .!TRAV
  127. !BIRD
  128. .I E
  129. .T J -2
  130. .S L=4
  131. .S SV(0)=3
  132. .S SV(2)=5
  133. .S SV(3)=128
  134. .N 
  135. .W 
  136. .S L=L--
  137. .I L
  138. .T J -7
  139. @    
  140.  
  141.